home *** CD-ROM | disk | FTP | other *** search
- // -----
- // VDL159.txt
- // Copyright 1996 Claris
- // -----
-
-
- // Menu Edit dialog
- /************************** LOCALIZED STRING CONSTANTS BEGIN **************************************/
- /************************** LOCALIZED STRING CONSTANTS BEGIN **************************************/
- /************************** LOCALIZED STRING CONSTANTS BEGIN **************************************/
-
- //This section contains all localizable string constants for this VDL program. Be sure to
- //include the backslash character at the end of each line of a multi-line string, except for the last line.
- //You may also flatten multiline constants into a single line, if you prefer
-
- #define kLit1 "Item List:"
- #define kLit2 "Title"
- #define kLit3 "&Number of Items Visible:"
- #define kLit4 "Allow Multiple Selections"
- #define kLit5 "Allow &Multiple Selections"
-
-
- //Note: the file name will probably not change, but the name of the "Help" folder
- //probably will. Note that the translated name MUST be 8 chars or less.
- #define kHelpURL "Help/Popups.htm"
- #define kHelpTitle "&Help"
-
- /************************** LOCALIZED STRING CONSTANTS END **************************************/
- /************************** LOCALIZED STRING CONSTANTS END **************************************/
- /************************** LOCALIZED STRING CONSTANTS END **************************************/
-
-
-
- /************************** LOCALIZED NUMERICAL CONSTANTS BEGIN **************************************/
- /************************** LOCALIZED NUMERICAL CONSTANTS BEGIN **************************************/
- /************************** LOCALIZED NUMERICAL CONSTANTS BEGIN **************************************/
-
- //This section contains integer constants that are used to format this VDL program.
- //These are localizable - they only need to be changed if the localized strings
- //are sufficiently longer than the US strings. Localize the strings first, then the constants.
-
- //Width of the whole dialog
- #define kDialogMainWidth 340
-
- //Width of the "Number of Items Visible" text
- #define kNumberOfItemsTextWidth 225
-
- //Width of the checkbox
- #define kAllowMultipleSelsWidth 200
-
- //Margins to the left and right of the checkmark icon at the top left of the
- //list
- #define kCheckIconLeftMargin 16
- #define kCheckIconRightMargin 14
-
- /************************** LOCALIZED NUMERICAL CONSTANTS END **************************************/
- /************************** LOCALIZED NUMERICAL CONSTANTS END **************************************/
- /************************** LOCALIZED NUMERICAL CONSTANTS END **************************************/
-
- //No further localizable data past this point
-
- /************************** END LOCALIZABLE DATA ***************************************************/
- /************************** END LOCALIZABLE DATA ***************************************************/
- /************************** END LOCALIZABLE DATA ***************************************************/
-
-
- #if Platform_Mac
- #define dlogBack BackColor = {65535, 65535, 65535}
- #define softBack {65535, 65535, 65535}
- #else
- #define dlogBack BackColor = Dialog
- #define softBack {25000, 25000, 25000}
- #endif
-
- #define EH EnabledHelpString =
-
- Margin(10, 10, 10, 10, dlogBack)
- VList(Width = kDialogMainWidth)
- {
- Label(kLit1, Single)
- Margin(15,5,15,15)
- VList(Width = UseParent)
- {
- HList(Width = UseParent)
- {
- Margin(kCheckIconLeftMargin, 2, kCheckIconRightMargin, 0)
- #if Platform_Mac
- cicn(2200);
- #else
- cicn(2201);
- #endif
- StaticText(kLit2);
- }
-
- //You can use this instead of the three margins below. Delete 1 pixel from the
- //left of the margin for the cicn above in this case (make it 15, not 16)
- /* Margin(1,1,1,1,BackColor = {0,0,0}) */
-
- #if Platform_Mac
- Margin(0,0,1,1, Width = UseParent, dlogBack )
- Margin(1,1,1,1, Width = UseParent, BackColor = softBack )
- Margin(1,1,0,1, Width = UseParent, BackColor = Black )
- #else
- Margin(0,0,1,1, Width = UseParent, BackColor = White )
- Margin(1,1,1,1, Width = UseParent, BackColor = softBack )
- Margin(1,1,1,1, Width = UseParent, BackColor = Black )
- #endif
- VList( Width = UseParent, Height = 180, VScroll,
- BackColor = {65535,65535,65535} )
- {
- // EditText(items, Width = UseParent, Height = 180, NoSmartQuotes);
- GenericView("MenuTextView", Width = UseParent);
- }
-
- }
-
- Spacer(Height = 15, Width = 0);
- EditText( visCount, Width = kNumberOfItemsTextWidth, // FilterProc = "MenuVisCount"
- BackColor = {65535, 65535, 65535},
- Label = kLit3, NoSmartQuotes, NoSmartEdits);
- Spacer(Height = 5, Width = 0);
-
- #if Platform_Mac
- WidowCheckBox( kLit4, allowMult,
- Width = kAllowMultipleSelsWidth, Height = 16 );
- #else
- CheckBox( kLit5, allowMult,
- Width = kAllowMultipleSelsWidth, Height = 16 );
- #endif
-
- Spacer(Height = 10, Width = 0);
- //StandardDialogButtonsHNoReturn;
- HList(Width = UseParent)
- {
- #if Platform_Mac
- PictPushButton(4000, "ContextHelpProc", HelpFile = kHelpURL)
- {
- Enabled(Draw, 'cicn',14055 );
- Disabled(Draw, 'cicn',14057 );
- Tracking(Draw, 'cicn',14056 );
- };
- #else
- PushButton(kHelpTitle, 4000, "ContextHelpProc", HelpFile = kHelpURL);
- #endif
-
- StandardDialogButtonsHEnterOnly;
- }
- }
-
-